# 导出阿贝尔群的参数信息到文件中

/home/eric/app/gap/gap-4.12.2/gap -q << EOI
filename := "abelian-groups.data";;
for order in [$1..$2] do
        for idx in [1..NumberSmallGroups(order)] do
                G := SmallGroup(order, idx);;
                if IsAbelian(G) then
                        AppendTo(filename, order, "-", idx, ".txt", "\n");;
                fi;;
        od;;
od;;
EOI
